/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / sillies / _azumith / _runimage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 22 f4 20 3e 3a | 34 2e 24 2e 50 52 54 2e |...". >:|4.$.PRT.|
|00000010| 21 61 7a 75 6d 69 74 68 | 2e 21 52 75 6e 49 6d 61 |!azumith|.!RunIma|
|00000020| 67 65 0d 00 14 05 3a 0d | 00 1e 23 f4 20 20 44 65 |ge....:.|..#.  De|
|00000030| 73 6b 74 6f 70 20 76 65 | 72 73 69 6f 6e 20 6f 66 |sktop ve|rsion of|
|00000040| 20 27 41 7a 75 6d 69 74 | 68 27 0d 00 28 05 3a 0d | 'Azumit|h'..(.:.|
|00000050| 00 32 21 f4 20 20 42 61 | 73 65 64 20 6f 6e 20 61 |.2!.  Ba|sed on a|
|00000060| 6e 20 69 64 65 61 20 61 | 67 65 73 20 6f 6c 64 21 |n idea a|ges old!|
|00000070| 0d 00 3c 29 f4 20 20 42 | 79 20 50 61 75 49 20 54 |..<).  B|y PauI T|
|00000080| 68 6f 72 6e 74 6f 6e 2e | 20 20 30 31 20 4a 61 6e |hornton.|  01 Jan|
|00000090| 75 61 72 79 20 31 39 39 | 30 0d 00 46 05 3a 0d 00 |uary 199|0..F.:..|
|000000a0| 50 0e ee 20 85 20 f2 65 | 72 72 6f 72 0d 00 5a 3b |P.. . .e|rror..Z;|
|000000b0| c8 99 20 22 57 69 6d 70 | 5f 49 6e 69 74 69 61 6c |.. "Wimp|_Initial|
|000000c0| 69 73 65 22 2c 32 30 30 | 2c 26 34 42 35 33 34 31 |ise",200|,&4B5341|
|000000d0| 35 34 2c 22 41 7a 75 6d | 69 74 68 22 20 b8 20 2c |54,"Azum|ith" . ,|
|000000e0| 68 61 6e 64 6c 65 25 0d | 00 64 2c de 20 51 25 20 |handle%.|.d,. Q% |
|000000f0| 26 38 30 30 2c 20 50 25 | 20 26 38 30 30 2c 20 62 |&800, P%| &800, b|
|00000100| 6c 6f 63 6b 25 20 31 30 | 30 30 2c 20 71 25 20 31 |lock% 10|00, q% 1|
|00000110| 36 30 30 0d 00 6e 36 de | 20 6d 61 69 6e 5f 62 6c |600..n6.| main_bl|
|00000120| 6b 25 20 31 30 30 30 2c | 20 72 61 74 65 5f 62 6c |k% 1000,| rate_bl|
|00000130| 6b 25 20 35 30 30 2c 20 | 76 61 72 20 31 32 2c 20 |k% 500, |var 12, |
|00000140| 72 74 62 75 66 66 20 36 | 34 0d 00 78 0e de 20 6c |rtbuff 6|4..x.. l|
|00000150| 69 6e 65 24 28 35 29 0d | 00 82 0e 24 71 25 3d 22 |ine$(5).|...$q%="|
|00000160| 54 41 53 4b 22 0d 00 8c | 0c 6d 77 73 3d 26 31 30 |TASK"...|.mws=&10|
|00000170| 30 0d 00 96 0b 77 61 69 | 74 25 3d 35 0d 00 a0 6d |0....wai|t%=5...m|
|00000180| 24 76 61 72 3d 22 41 7a | 75 6d 69 74 68 24 44 69 |$var="Az|umith$Di|
|00000190| 72 22 3a c8 99 20 26 32 | 33 2c 76 61 72 2c 72 74 |r":.. &2|3,var,rt|
|000001a0| 62 75 66 66 2c 36 34 2c | 30 2c 30 20 b8 20 2c 2c |buff,64,|0,0 . ,,|
|000001b0| 6e 62 72 3a 6c 6f 63 61 | 74 24 3d 22 22 3a e3 20 |nbr:loca|t$="":. |
|000001c0| 4b 3d 30 20 b8 20 28 6e | 62 72 2d 31 29 3a 6c 6f |K=0 . (n|br-1):lo|
|000001d0| 63 61 74 24 3d 6c 6f 63 | 61 74 24 2b bd 28 72 74 |cat$=loc|at$+.(rt|
|000001e0| 62 75 66 66 3f 4b 29 3a | ed 0d 00 aa 1d de 20 69 |buff?K):|...... i|
|000001f0| 6e 64 69 72 25 20 6d 77 | 73 2c 20 69 6e 64 69 72 |ndir% mw|s, indir|
|00000200| 32 25 20 6d 77 73 0d 00 | b4 0e f2 6c 6f 61 64 6d |2% mws..|...loadm|
|00000210| 65 6e 75 73 0d 00 be 2f | c8 99 20 22 57 69 6d 70 |enus.../|.. "Wimp|
|00000220| 5f 4f 70 65 6e 54 65 6d | 70 6c 61 74 65 22 2c 2c |_OpenTem|plate",,|
|00000230| 6c 6f 63 61 74 24 2b 22 | 2e 54 65 6d 70 6c 61 74 |locat$+"|.Templat|
|00000240| 65 73 22 0d 00 c8 3c c8 | 99 20 22 57 69 6d 70 5f |es"...<.|. "Wimp_|
|00000250| 4c 6f 61 64 54 65 6d 70 | 6c 61 74 65 22 2c 2c 51 |LoadTemp|late",,Q|
|00000260| 25 2c 69 6e 64 69 72 25 | 2c 69 6e 64 69 72 25 2b |%,indir%|,indir%+|
|00000270| 6d 77 73 2c 2d 31 2c 22 | 6d 61 69 6e 22 2c 30 0d |mws,-1,"|main",0.|
|00000280| 00 d2 3e c8 99 20 22 57 | 69 6d 70 5f 4c 6f 61 64 |..>.. "W|imp_Load|
|00000290| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 50 25 2c 69 6e |Template|",,P%,in|
|000002a0| 64 69 72 32 25 2c 69 6e | 64 69 72 32 25 2b 6d 77 |dir2%,in|dir2%+mw|
|000002b0| 73 2c 2d 31 2c 22 69 6e | 66 6f 22 2c 30 0d 00 dc |s,-1,"in|fo",0...|
|000002c0| 2b c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 |+.. "Wim|p_Create|
|000002d0| 57 69 6e 64 6f 77 22 2c | 2c 51 25 20 b8 20 6f 75 |Window",|,Q% . ou|
|000002e0| 72 77 69 6e 64 6f 77 25 | 0d 00 e6 2c c8 99 20 22 |rwindow%|...,.. "|
|000002f0| 57 69 6d 70 5f 43 72 65 | 61 74 65 57 69 6e 64 6f |Wimp_Cre|ateWindo|
|00000300| 77 22 2c 2c 50 25 20 b8 | 20 69 6e 66 6f 77 69 6e |w",,P% .| infowin|
|00000310| 64 6f 77 25 0d 00 f0 1b | c8 99 20 22 57 69 6d 70 |dow%....|.. "Wimp|
|00000320| 5f 43 6c 6f 73 65 54 65 | 6d 70 6c 61 74 65 22 0d |_CloseTe|mplate".|
|00000330| 00 fa 12 f2 64 69 73 70 | 6c 61 79 77 69 6e 64 6f |....disp|laywindo|
|00000340| 77 0d 01 04 09 f2 64 6f | 69 74 0d 01 0e 05 3a 0d |w.....do|it....:.|
|00000350| 01 18 05 f5 0d 01 22 0a | f2 63 68 65 63 6b 0d 01 |......".|.check..|
|00000360| 2c 25 c8 99 20 22 57 69 | 6d 70 5f 50 6f 6c 6c 22 |,%.. "Wi|mp_Poll"|
|00000370| 2c 30 2c 62 6c 6f 63 6b | 25 20 b8 20 72 65 61 73 |,0,block|% . reas|
|00000380| 6f 6e 25 0d 01 36 24 e7 | 20 72 65 61 73 6f 6e 25 |on%..6$.| reason%|
|00000390| 3e 30 20 8c 20 f2 64 65 | 61 6c 77 69 74 68 28 72 |>0 . .de|alwith(r|
|000003a0| 65 61 73 6f 6e 25 29 0d | 01 40 3b fd 20 72 65 61 |eason%).|.@;. rea|
|000003b0| 73 6f 6e 25 3d 33 20 84 | 20 28 28 72 65 61 73 6f |son%=3 .| ((reaso|
|000003c0| 6e 25 3d 31 37 20 84 20 | 72 65 61 73 6f 6e 25 3d |n%=17 . |reason%=|
|000003d0| 31 38 29 20 80 20 62 6c | 6f 63 6b 25 21 31 36 3d |18) . bl|ock%!16=|
|000003e0| 30 29 0d 01 4a 22 c8 99 | 20 22 57 69 6d 70 5f 43 |0)..J"..| "Wimp_C|
|000003f0| 6c 6f 73 65 44 6f 77 6e | 22 2c 68 61 6e 64 6c 65 |loseDown|",handle|
|00000400| 25 2c 71 25 0d 01 54 05 | e0 0d 01 5e 05 3a 0d 01 |%,q%..T.|...^.:..|
|00000410| 68 12 dd 20 f2 64 65 61 | 6c 77 69 74 68 28 52 29 |h.. .dea|lwith(R)|
|00000420| 0d 01 72 0a c8 8e 20 52 | 20 ca 0d 01 7c 26 c9 20 |..r... R| ...|&. |
|00000430| 32 20 3a 20 c8 99 20 22 | 57 69 6d 70 5f 4f 70 65 |2 : .. "|Wimp_Ope|
|00000440| 6e 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |nWindow"|,,block%|
|00000450| 0d 01 86 27 c9 20 33 20 | 3a 20 c8 99 20 22 57 69 |...'. 3 |: .. "Wi|
|00000460| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|00000470| 2c 62 6c 6f 63 6b 25 0d | 01 90 10 c9 20 36 20 3a |,block%.|.... 6 :|
|00000480| 20 f2 6d 6f 75 73 65 0d | 01 9a 16 c9 20 39 20 3a | .mouse.|.... 9 :|
|00000490| 20 f2 6d 65 6e 75 5f 73 | 65 6c 65 63 74 0d 01 a4 | .menu_s|elect...|
|000004a0| 05 cb 0d 01 ae 05 e1 0d | 01 b8 05 3a 0d 01 c2 05 |........|...:....|
|000004b0| 3a 0d 01 cc 0b dd 20 f2 | 64 6f 69 74 0d 01 d6 0c |:..... .|doit....|
|000004c0| f2 63 6f 6e 63 6f 63 74 | 0d 01 e0 0d e3 20 4a 3d |.concoct|..... J=|
|000004d0| 30 20 b8 20 34 0d 01 ea | 18 f2 77 72 69 74 65 28 |0 . 4...|..write(|
|000004e0| 4a 2c 6c 69 6e 65 24 28 | 4a 2b 31 29 29 0d 01 f4 |J,line$(|J+1))...|
|000004f0| 05 ed 0d 01 fe 29 c8 99 | 20 22 4f 53 5f 52 65 61 |.....)..| "OS_Rea|
|00000500| 64 4d 6f 6e 6f 74 6f 6e | 69 63 54 69 6d 65 22 20 |dMonoton|icTime" |
|00000510| b8 20 6c 61 73 74 64 6f | 6e 65 25 0d 02 08 05 e1 |. lastdo|ne%.....|
|00000520| 0d 02 12 05 3a 0d 02 1c | 0c dd 20 f2 63 68 65 63 |....:...|.. .chec|
|00000530| 6b 0d 02 26 24 c8 99 20 | 22 4f 53 5f 52 65 61 64 |k..&$.. |"OS_Read|
|00000540| 4d 6f 6e 6f 74 6f 6e 69 | 63 54 69 6d 65 22 20 b8 |Monotoni|cTime" .|
|00000550| 20 6e 6f 77 25 0d 02 30 | 2a e7 20 6e 6f 77 25 3e | now%..0|*. now%>|
|00000560| 28 6c 61 73 74 64 6f 6e | 65 25 2b 28 77 61 69 74 |(lastdon|e%+(wait|
|00000570| 25 2a 31 30 30 29 29 20 | 8c 20 f2 64 6f 69 74 0d |%*100)) |. .doit.|
|00000580| 02 3a 05 e1 0d 02 44 05 | 3a 0d 02 4e 0c dd 20 f2 |.:....D.|:..N.. .|
|00000590| 65 72 72 6f 72 0d 02 58 | 18 c8 99 20 22 57 69 6d |error..X|... "Wim|
|000005a0| 70 5f 44 72 61 67 42 6f | 78 22 2c 2c 30 0d 02 62 |p_DragBo|x",,0..b|
|000005b0| 0d 21 62 6c 6f 63 6b 25 | 3d 9f 0d 02 6c 0b 66 61 |.!block%|=...l.fa|
|000005c0| 74 61 6c 3d b9 0d 02 76 | 3e 24 28 62 6c 6f 63 6b |tal=...v|>$(block|
|000005d0| 25 2b 34 29 3d 22 49 6e | 74 65 72 6e 61 6c 20 65 |%+4)="In|ternal e|
|000005e0| 72 72 6f 72 2c 20 6c 69 | 6e 65 20 22 2b c3 28 9e |rror, li|ne "+.(.|
|000005f0| 29 2b 22 2e 20 20 22 2b | f6 24 2b 22 2e 22 2b bd |)+".  "+|.$+"."+.|
|00000600| 28 30 29 0d 02 80 2c c8 | 99 20 22 57 69 6d 70 5f |(0)...,.|. "Wimp_|
|00000610| 52 65 70 6f 72 74 45 72 | 72 6f 72 22 2c 62 6c 6f |ReportEr|ror",blo|
|00000620| 63 6b 25 2c 31 2c 22 41 | 7a 75 6d 69 74 68 22 0d |ck%,1,"A|zumith".|
|00000630| 02 8a 0a e5 20 8d 44 4a | 41 0d 02 94 05 3a 0d 02 |.... .DJ|A....:..|
|00000640| 9e 14 dd 20 f2 64 69 73 | 70 6c 61 79 77 69 6e 64 |... .dis|playwind|
|00000650| 6f 77 0d 02 a8 16 21 62 | 6c 6f 63 6b 25 3d 6f 75 |ow....!b|lock%=ou|
|00000660| 72 77 69 6e 64 6f 77 25 | 0d 02 b2 0e 62 6c 6f 63 |rwindow%|....bloc|
|00000670| 6b 25 21 34 3d 30 0d 02 | bc 11 62 6c 6f 63 6b 25 |k%!4=0..|..block%|
|00000680| 21 38 3d 2d 31 37 36 0d | 02 c6 11 62 6c 6f 63 6b |!8=-176.|...block|
|00000690| 25 21 31 32 3d 37 37 38 | 0d 02 d0 0f 62 6c 6f 63 |%!12=778|....bloc|
|000006a0| 6b 25 21 31 36 3d 30 0d | 02 da 0f 62 6c 6f 63 6b |k%!16=0.|...block|
|000006b0| 25 21 32 30 3d 30 0d 02 | e4 0f 62 6c 6f 63 6b 25 |%!20=0..|..block%|
|000006c0| 21 32 34 3d 30 0d 02 ee | 10 62 6c 6f 63 6b 25 21 |!24=0...|.block%!|
|000006d0| 32 38 3d 2d 31 0d 02 f8 | 20 c8 99 20 22 57 69 6d |28=-1...| .. "Wim|
|000006e0| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 62 |p_OpenWi|ndow",,b|
|000006f0| 6c 6f 63 6b 25 0d 03 02 | 05 e1 0d 03 0c 05 3a 0d |lock%...|......:.|
|00000700| 03 16 18 dd 20 f2 77 72 | 69 74 65 28 69 63 6f 6e |.... .wr|ite(icon|
|00000710| 2c 74 65 78 74 24 29 0d | 03 20 12 21 71 25 3d 6f |,text$).|. .!q%=o|
|00000720| 75 72 77 69 6e 64 6f 77 | 25 0d 03 2a 0d 71 25 21 |urwindow|%..*.q%!|
|00000730| 34 3d 69 63 6f 6e 0d 03 | 34 1e c8 99 20 22 57 69 |4=icon..|4... "Wi|
|00000740| 6d 70 5f 47 65 74 49 63 | 6f 6e 53 74 61 74 65 22 |mp_GetIc|onState"|
|00000750| 2c 2c 71 25 0d 03 3e 10 | 24 71 25 21 32 38 3d 74 |,,q%..>.|$q%!28=t|
|00000760| 65 78 74 24 0d 03 48 0a | 71 25 21 38 3d 30 0d 03 |ext$..H.|q%!8=0..|
|00000770| 52 0b 71 25 21 31 32 3d | 30 0d 03 5c 1e c8 99 20 |R.q%!12=|0..\... |
|00000780| 22 57 69 6d 70 5f 53 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Se|tIconSta|
|00000790| 74 65 22 2c 2c 71 25 0d | 03 66 05 e1 0d 03 70 05 |te",,q%.|.f....p.|
|000007a0| 3a 0d 03 7a 10 dd 20 f2 | 6c 6f 61 64 6d 65 6e 75 |:..z.. .|loadmenu|
|000007b0| 73 0d 03 84 18 4c 3d 8e | 28 6c 6f 63 61 74 24 2b |s....L=.|(locat$+|
|000007c0| 22 2e 4d 65 6e 75 73 22 | 29 0d 03 8e 0b 64 69 6d |".Menus"|)....dim|
|000007d0| 3d a2 23 4c 0d 03 98 07 | d9 23 4c 0d 03 a2 14 de |=.#L....|.#L.....|
|000007e0| 20 6d 65 6e 75 5f 64 61 | 74 61 25 20 64 69 6d 0d | menu_da|ta% dim.|
|000007f0| 03 ac 2d ff 20 22 4c 4f | 41 44 20 22 2b 6c 6f 63 |..-. "LO|AD "+loc|
|00000800| 61 74 24 2b 22 2e 4d 65 | 6e 75 73 20 22 2b c3 7e |at$+".Me|nus "+.~|
|00000810| 28 6d 65 6e 75 5f 64 61 | 74 61 25 29 0d 03 b6 14 |(menu_da|ta%)....|
|00000820| 63 75 72 72 65 6e 74 5f | 6d 65 6e 75 24 3d 22 22 |current_|menu$=""|
|00000830| 0d 03 c0 05 e1 0d 03 ca | 05 3a 0d 03 d4 20 dd 20 |........|.:... . |
|00000840| f2 63 72 65 61 74 65 5f | 6d 65 6e 75 28 74 69 74 |.create_|menu(tit|
|00000850| 6c 65 24 2c 78 25 2c 79 | 25 29 0d 03 de 0c 6d 65 |le$,x%,y|%)....me|
|00000860| 6e 79 25 3d 79 25 0d 03 | e8 1d f2 62 75 69 6c 64 |ny%=y%..|...build|
|00000870| 5f 6d 65 6e 75 28 74 69 | 74 6c 65 24 2c 6d 65 6e |_menu(ti|tle$,men|
|00000880| 79 25 29 0d 03 f2 0f 6d | 65 6e 78 25 3d 78 25 2d |y%)....m|enx%=x%-|
|00000890| 36 34 0d 03 fc 0c 6d 65 | 6e 79 25 3d 79 25 0d 04 |64....me|ny%=y%..|
|000008a0| 06 29 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 |.).. "Wi|mp_Creat|
|000008b0| 65 4d 65 6e 75 22 2c 2c | 62 6c 6b 2c 6d 65 6e 78 |eMenu",,|blk,menx|
|000008c0| 25 2c 6d 65 6e 79 25 0d | 04 10 05 e1 0d 04 1a 05 |%,meny%.|........|
|000008d0| 3a 0d 04 24 23 dd 20 f2 | 62 75 69 6c 64 5f 6d 65 |:..$#. .|build_me|
|000008e0| 6e 75 28 74 69 74 6c 65 | 24 2c f8 20 68 65 69 67 |nu(title|$,. heig|
|000008f0| 68 74 25 29 0d 04 2e 39 | ea 20 6f 66 73 2c 69 2c |ht%)...9|. ofs,i,|
|00000900| 6d 65 6e 75 69 74 65 6d | 73 2c 64 6f 74 73 2c 77 |menuitem|s,dots,w|
|00000910| 69 6d 70 66 6c 61 67 73 | 2c 66 6c 61 67 73 2c 70 |impflags|,flags,p|
|00000920| 74 72 2c 6e 61 6d 65 24 | 2c 70 74 72 24 0d 04 38 |tr,name$|,ptr$..8|
|00000930| 25 6f 66 73 3d a4 66 69 | 6e 64 5f 6d 65 6e 75 28 |%ofs=.fi|nd_menu(|
|00000940| 74 69 74 6c 65 24 2c 6d | 65 6e 75 5f 64 61 74 61 |title$,m|enu_data|
|00000950| 25 29 0d 04 42 28 e7 20 | 6f 66 73 3d b9 20 8c 20 |%)..B(. |ofs=. . |
|00000960| 85 20 34 34 2c 22 4d 65 | 6e 75 20 64 61 74 61 20 |. 44,"Me|nu data |
|00000970| 6e 6f 74 20 66 6f 75 6e | 64 22 0d 04 4c 27 62 6c |not foun|d"..L'bl|
|00000980| 6b 24 3d a4 67 65 74 5f | 6d 65 6e 75 5f 69 74 65 |k$=.get_|menu_ite|
|00000990| 6d 28 6d 65 6e 75 5f 64 | 61 74 61 25 2c 6f 66 73 |m(menu_d|ata%,ofs|
|000009a0| 29 0d 04 56 0f 62 6c 6b | 3d a0 28 62 6c 6b 24 29 |)..V.blk|=.(blk$)|
|000009b0| 0d 04 60 14 24 62 6c 6b | 3d c0 74 69 74 6c 65 24 |..`.$blk|=.title$|
|000009c0| 2c 31 32 29 0d 04 6a 0c | 62 6c 6b 3f 31 32 3d 37 |,12)..j.|blk?12=7|
|000009d0| 0d 04 74 0c 62 6c 6b 3f | 31 33 3d 32 0d 04 7e 0c |..t.blk?|13=2..~.|
|000009e0| 62 6c 6b 3f 31 34 3d 37 | 0d 04 88 0c 62 6c 6b 3f |blk?14=7|....blk?|
|000009f0| 31 35 3d 30 0d 04 92 0e | 62 6c 6b 21 31 36 3d 31 |15=0....|blk!16=1|
|00000a00| 37 32 0d 04 9c 0d 62 6c | 6b 21 32 30 3d 34 34 0d |72....bl|k!20=44.|
|00000a10| 04 a6 0c 62 6c 6b 21 32 | 34 3d 30 0d 04 b0 08 69 |...blk!2|4=0....i|
|00000a20| 3d 32 38 0d 04 ba 16 6d | 65 6e 75 69 74 65 6d 73 |=28....m|enuitems|
|00000a30| 3d 30 3a 64 6f 74 73 3d | 30 0d 04 c4 32 c8 95 20 |=0:dots=|0...2.. |
|00000a40| 6d 65 6e 75 5f 64 61 74 | 61 25 3f 6f 66 73 3c 3e |menu_dat|a%?ofs<>|
|00000a50| 97 22 7e 22 20 80 20 6d | 65 6e 75 5f 64 61 74 61 |."~" . m|enu_data|
|00000a60| 25 3f 6f 66 73 3c 3e 97 | 22 5e 22 0d 04 ce 0e f2 |%?ofs<>.|"^".....|
|00000a70| 6d 65 6e 75 5f 69 74 65 | 6d 0d 04 d8 4b e7 20 c2 |menu_ite|m...K. .|
|00000a80| 6e 61 6d 65 24 2c 31 29 | 3d 22 40 22 20 8c 20 6e |name$,1)|="@" . n|
|00000a90| 61 6d 65 24 3d c0 6e 61 | 6d 65 24 2c a9 6e 61 6d |ame$=.na|me$,.nam|
|00000aa0| 65 24 2d 31 29 3a 70 74 | 72 24 3d a4 62 75 69 6c |e$-1):pt|r$=.buil|
|00000ab0| 64 5f 73 75 62 6d 65 6e | 75 28 6e 61 6d 65 24 2c |d_submen|u(name$,|
|00000ac0| 70 6f 73 29 0d 04 e2 15 | e7 20 28 66 6c 61 67 73 |pos)....|. (flags|
|00000ad0| 20 80 20 34 29 3d 34 20 | 8c 0d 04 ec 15 69 6e 73 | . 4)=4 |.....ins|
|00000ae0| 74 72 25 3d a7 70 74 72 | 24 2c 22 2c 22 29 0d 04 |tr%=.ptr|$,",")..|
|00000af0| f6 22 20 62 6c 6b 21 28 | 69 2b 31 32 29 3d a0 28 |." blk!(|i+12)=.(|
|00000b00| c0 70 74 72 24 2c 69 6e | 73 74 72 25 2d 31 29 29 |.ptr$,in|str%-1))|
|00000b10| 0d 05 00 18 70 74 72 24 | 3d c1 70 74 72 24 2c 69 |....ptr$|=.ptr$,i|
|00000b20| 6e 73 74 72 25 2b 31 29 | 0d 05 0a 16 62 6c 6b 21 |nstr%+1)|....blk!|
|00000b30| 28 69 2b 32 30 29 3d a0 | 28 70 74 72 24 29 0d 05 |(i+20)=.|(ptr$)..|
|00000b40| 14 1d 77 69 6d 70 66 6c | 61 67 73 3d 77 69 6d 70 |..wimpfl|ags=wimp|
|00000b50| 66 6c 61 67 73 20 84 20 | 32 5e 38 0d 05 1e 0a 70 |flags . |2^8....p|
|00000b60| 74 72 3d 2d 31 0d 05 28 | 24 24 28 62 6c 6b 21 28 |tr=-1..(|$$(blk!(|
|00000b70| 69 2b 31 32 29 29 3d c0 | 6e 61 6d 65 24 2c 62 6c |i+12))=.|name$,bl|
|00000b80| 6b 21 28 69 2b 32 30 29 | 29 0d 05 32 05 cc 0d 05 |k!(i+20)|)..2....|
|00000b90| 3c 1a 24 28 62 6c 6b 2b | 69 2b 31 32 29 3d c0 6e |<.$(blk+|i+12)=.n|
|00000ba0| 61 6d 65 24 2c 31 32 29 | 0d 05 46 0f 70 74 72 3d |ame$,12)|..F.ptr=|
|00000bb0| a0 28 70 74 72 24 29 0d | 05 50 05 cd 0d 05 5a 0f |.(ptr$).|.P....Z.|
|00000bc0| 62 6c 6b 21 69 3d 66 6c | 61 67 73 0d 05 64 11 62 |blk!i=fl|ags..d.b|
|00000bd0| 6c 6b 21 28 69 2b 34 29 | 3d 70 74 72 0d 05 6e 17 |lk!(i+4)|=ptr..n.|
|00000be0| 62 6c 6b 21 28 69 2b 38 | 29 3d 77 69 6d 70 66 6c |blk!(i+8|)=wimpfl|
|00000bf0| 61 67 73 0d 05 78 0a 69 | 3d 69 2b 32 34 0d 05 82 |ags..x.i|=i+24...|
|00000c00| 10 6d 65 6e 75 69 74 65 | 6d 73 2b 3d 31 0d 05 8c |.menuite|ms+=1...|
|00000c10| 05 ce 0d 05 96 27 68 65 | 69 67 68 74 25 3d 39 36 |.....'he|ight%=96|
|00000c20| 2b 28 6d 65 6e 75 69 74 | 65 6d 73 2a 34 34 29 2b |+(menuit|ems*44)+|
|00000c30| 28 64 6f 74 73 2a 32 34 | 29 0d 05 a0 1b 63 75 72 |(dots*24|)....cur|
|00000c40| 72 65 6e 74 5f 6d 65 6e | 75 24 3d c0 24 62 6c 6b |rent_men|u$=.$blk|
|00000c50| 2c 31 32 29 0d 05 aa 05 | e1 0d 05 b4 05 3a 0d 05 |,12)....|.....:..|
|00000c60| be 10 dd 20 f2 6d 65 6e | 75 5f 69 74 65 6d 0d 05 |... .men|u_item..|
|00000c70| c8 16 77 69 6d 70 66 6c | 61 67 73 3d 26 37 30 30 |..wimpfl|ags=&700|
|00000c80| 30 30 32 31 0d 05 d2 1e | 66 6c 61 67 73 3d 30 3a |0021....|flags=0:|
|00000c90| 70 74 72 24 3d 22 2d 31 | 22 3a 66 75 6e 63 24 3d |ptr$="-1|":func$=|
|00000ca0| 22 22 0d 05 dc 28 6e 61 | 6d 65 24 3d a4 67 65 74 |""...(na|me$=.get|
|00000cb0| 5f 6d 65 6e 75 5f 69 74 | 65 6d 28 6d 65 6e 75 5f |_menu_it|em(menu_|
|00000cc0| 64 61 74 61 25 2c 6f 66 | 73 29 0d 05 e6 42 e7 20 |data%,of|s)...B. |
|00000cd0| 6d 65 6e 75 5f 64 61 74 | 61 25 3f 6f 66 73 3d 33 |menu_dat|a%?ofs=3|
|00000ce0| 33 20 6f 66 73 2b 3d 31 | 3a 70 74 72 24 3d a4 67 |3 ofs+=1|:ptr$=.g|
|00000cf0| 65 74 5f 6d 65 6e 75 5f | 69 74 65 6d 28 6d 65 6e |et_menu_|item(men|
|00000d00| 75 5f 64 61 74 61 25 2c | 6f 66 73 29 0d 05 f0 4c |u_data%,|ofs)...L|
|00000d10| e7 20 6d 65 6e 75 5f 64 | 61 74 61 25 3f 6f 66 73 |. menu_d|ata%?ofs|
|00000d20| 3d 97 22 7b 22 20 6f 66 | 73 2b 3d 31 3a 77 69 6d |=."{" of|s+=1:wim|
|00000d30| 70 66 6c 61 67 73 3d a0 | 28 a4 67 65 74 5f 6d 65 |pflags=.|(.get_me|
|00000d40| 6e 75 5f 69 74 65 6d 28 | 6d 65 6e 75 5f 64 61 74 |nu_item(|menu_dat|
|00000d50| 61 25 2c 6f 66 73 29 29 | 0d 05 fa 45 e7 20 6d 65 |a%,ofs))|...E. me|
|00000d60| 6e 75 5f 64 61 74 61 25 | 3f 6f 66 73 3d 97 22 5c |nu_data%|?ofs=."\|
|00000d70| 22 20 6f 66 73 2b 3d 31 | 3a 66 75 6e 63 24 3d a4 |" ofs+=1|:func$=.|
|00000d80| 67 65 74 5f 6d 65 6e 75 | 5f 69 74 65 6d 28 6d 65 |get_menu|_item(me|
|00000d90| 6e 75 5f 64 61 74 61 25 | 2c 6f 66 73 29 0d 06 04 |nu_data%|,ofs)...|
|00000da0| 41 e7 20 6d 65 6e 75 5f | 64 61 74 61 25 3f 6f 66 |A. menu_|data%?of|
|00000db0| 73 3d 97 22 7e 22 20 84 | 20 6d 65 6e 75 5f 64 61 |s=."~" .| menu_da|
|00000dc0| 74 61 25 3f 6f 66 73 3d | 97 22 5e 22 20 66 6c 61 |ta%?ofs=|."^" fla|
|00000dd0| 67 73 3d 66 6c 61 67 73 | 20 84 20 26 38 30 0d 06 |gs=flags| . &80..|
|00000de0| 0e 2e e7 20 c0 6e 61 6d | 65 24 2c 31 29 3d 22 7d |... .nam|e$,1)="}|
|00000df0| 22 20 8c 20 66 6c 61 67 | 73 2b 3d 31 3a 6e 61 6d |" . flag|s+=1:nam|
|00000e00| 65 24 3d c1 6e 61 6d 65 | 24 2c 32 29 0d 06 18 2e |e$=.name|$,2)....|
|00000e10| e7 20 c0 6e 61 6d 65 24 | 2c 31 29 3d 22 23 22 20 |. .name$|,1)="#" |
|00000e20| 8c 20 66 6c 61 67 73 2b | 3d 34 3a 6e 61 6d 65 24 |. flags+|=4:name$|
|00000e30| 3d c1 6e 61 6d 65 24 2c | 32 29 0d 06 22 3d e7 20 |=.name$,|2).."=. |
|00000e40| c2 6e 61 6d 65 24 2c 31 | 29 3d 22 7d 22 20 8c 20 |.name$,1|)="}" . |
|00000e50| 66 6c 61 67 73 2b 3d 32 | 3a 6e 61 6d 65 24 3d c0 |flags+=2|:name$=.|
|00000e60| 6e 61 6d 65 24 2c a9 6e | 61 6d 65 24 2d 31 29 3a |name$,.n|ame$-1):|
|00000e70| 64 6f 74 73 2b 3d 31 0d | 06 2c 05 e1 0d 06 36 05 |dots+=1.|.,....6.|
|00000e80| 3a 0d 06 40 20 dd 20 a4 | 62 75 69 6c 64 5f 73 75 |:..@ . .|build_su|
|00000e90| 62 6d 65 6e 75 28 74 69 | 74 6c 65 24 2c 70 6f 73 |bmenu(ti|tle$,pos|
|00000ea0| 29 0d 06 4a 0e ea 20 62 | 6c 6b 24 2c 62 6c 6b 0d |)..J.. b|lk$,blk.|
|00000eb0| 06 54 1b f2 62 75 69 6c | 64 5f 6d 65 6e 75 28 74 |.T..buil|d_menu(t|
|00000ec0| 69 74 6c 65 24 2c 70 6f | 73 29 0d 06 5e 09 3d 62 |itle$,po|s)..^.=b|
|00000ed0| 6c 6b 24 0d 06 68 05 3a | 0d 06 72 12 dd 20 f2 6d |lk$..h.:|..r.. .m|
|00000ee0| 65 6e 75 5f 73 65 6c 65 | 63 74 0d 06 7c 20 c8 99 |enu_sele|ct..| ..|
|00000ef0| 20 22 57 69 6d 70 5f 47 | 65 74 50 6f 69 6e 74 65 | "Wimp_G|etPointe|
|00000f00| 72 49 6e 66 6f 22 2c 2c | 71 25 0d 06 86 0d 62 75 |rInfo",,|q%....bu|
|00000f10| 74 25 3d 71 25 21 38 0d | 06 90 0c 64 65 70 74 68 |t%=q%!8.|...depth|
|00000f20| 25 3d 30 0d 06 9a 1f f2 | 64 65 63 6f 64 65 5f 6d |%=0.....|decode_m|
|00000f30| 65 6e 75 28 63 75 72 72 | 65 6e 74 5f 6d 65 6e 75 |enu(curr|ent_menu|
|00000f40| 24 29 0d 06 a4 4e e7 20 | 28 62 75 74 25 20 80 20 |$)...N. |(but% . |
|00000f50| 31 29 3d 31 20 8c 20 f2 | 72 65 6f 70 65 6e 6d 65 |1)=1 . .|reopenme|
|00000f60| 6e 75 28 63 75 72 72 65 | 6e 74 5f 6d 65 6e 75 24 |nu(curre|nt_menu$|
|00000f70| 2c 6d 65 6e 78 25 2c 6d | 65 6e 79 25 29 3a 8b 20 |,menx%,m|eny%):. |
|00000f80| 63 75 72 72 65 6e 74 5f | 6d 65 6e 75 24 3d 22 22 |current_|menu$=""|
|00000f90| 0d 06 ae 05 e1 0d 06 b8 | 05 3a 0d 06 c2 21 dd 20 |........|.:...!. |
|00000fa0| f2 72 65 6f 70 65 6e 6d | 65 6e 75 28 74 69 74 6c |.reopenm|enu(titl|
|00000fb0| 65 24 2c 6d 78 25 2c 6d | 79 25 29 0d 06 cc 25 6f |e$,mx%,m|y%)...%o|
|00000fc0| 66 73 3d a4 66 69 6e 64 | 5f 6d 65 6e 75 28 74 69 |fs=.find|_menu(ti|
|00000fd0| 74 6c 65 24 2c 6d 65 6e | 75 5f 64 61 74 61 25 29 |tle$,men|u_data%)|
|00000fe0| 0d 06 d6 29 62 6c 6b 3d | a0 28 a4 67 65 74 5f 6d |...)blk=|.(.get_m|
|00000ff0| 65 6e 75 5f 69 74 65 6d | 28 6d 65 6e 75 5f 64 61 |enu_item|(menu_da|
|00001000| 74 61 25 2c 6f 66 73 29 | 29 0d 06 e0 25 c8 99 20 |ta%,ofs)|)...%.. |
|00001010| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 4d 65 6e 75 |"Wimp_Cr|eateMenu|
|00001020| 22 2c 2c 62 6c 6b 2c 6d | 78 25 2c 6d 79 25 0d 06 |",,blk,m|x%,my%..|
|00001030| ea 18 63 75 72 72 65 6e | 74 5f 6d 65 6e 75 24 3d |..curren|t_menu$=|
|00001040| 74 69 74 6c 65 24 0d 06 | f4 05 e1 0d 06 fe 05 3a |title$..|.......:|
|00001050| 0d 07 08 1a dd 20 f2 64 | 65 63 6f 64 65 5f 6d 65 |..... .d|ecode_me|
|00001060| 6e 75 28 74 69 74 6c 65 | 24 29 0d 07 12 14 ea 20 |nu(title|$)..... |
|00001070| 6d 65 6e 5f 6c 6f 6f 70 | 2c 66 75 6e 63 24 0d 07 |men_loop|,func$..|
|00001080| 1c 25 6f 66 73 3d a4 66 | 69 6e 64 5f 6d 65 6e 75 |.%ofs=.f|ind_menu|
|00001090| 28 74 69 74 6c 65 24 2c | 6d 65 6e 75 5f 64 61 74 |(title$,|menu_dat|
|000010a0| 61 25 29 0d 07 26 29 62 | 6c 6b 3d a0 28 a4 67 65 |a%)..&)b|lk=.(.ge|
|000010b0| 74 5f 6d 65 6e 75 5f 69 | 74 65 6d 28 6d 65 6e 75 |t_menu_i|tem(menu|
|000010c0| 5f 64 61 74 61 25 2c 6f | 66 73 29 29 0d 07 30 0e |_data%,o|fs))..0.|
|000010d0| 6d 65 6e 5f 6c 6f 6f 70 | 3d 30 0d 07 3a 1e c8 95 |men_loop|=0..:...|
|000010e0| 20 6d 65 6e 5f 6c 6f 6f | 70 3c 3d 62 6c 6f 63 6b | men_loo|p<=block|
|000010f0| 25 21 64 65 70 74 68 25 | 0d 07 44 0a 64 6f 74 73 |%!depth%|..D.dots|
|00001100| 3d 30 0d 07 4e 0e f2 6d | 65 6e 75 5f 69 74 65 6d |=0..N..m|enu_item|
|00001110| 0d 07 58 0f 6d 65 6e 5f | 6c 6f 6f 70 2b 3d 31 0d |..X.men_|loop+=1.|
|00001120| 07 62 05 ce 0d 07 6c 18 | e7 20 62 6c 6f 63 6b 25 |.b....l.|. block%|
|00001130| 21 64 65 70 74 68 25 3e | 2d 31 20 8c 0d 07 76 4a |!depth%>|-1 ...vJ|
|00001140| e7 20 c2 6e 61 6d 65 24 | 2c 31 29 3d 22 40 22 20 |. .name$|,1)="@" |
|00001150| 8c 20 6e 61 6d 65 24 3d | c0 6e 61 6d 65 24 2c a9 |. name$=|.name$,.|
|00001160| 6e 61 6d 65 24 2d 31 29 | 3a 64 65 70 74 68 25 2b |name$-1)|:depth%+|
|00001170| 3d 34 3a f2 64 65 63 6f | 64 65 5f 6d 65 6e 75 28 |=4:.deco|de_menu(|
|00001180| 6e 61 6d 65 24 29 0d 07 | 80 21 e7 20 66 75 6e 63 |name$)..|.!. func|
|00001190| 24 3c 3e 22 22 20 8c 20 | 61 3d a0 28 22 46 4e 22 |$<>"" . |a=.("FN"|
|000011a0| 2b 66 75 6e 63 24 29 0d | 07 8a 05 cd 0d 07 94 05 |+func$).|........|
|000011b0| e1 0d 07 9e 05 3a 0d 07 | a8 0c dd 20 f2 6d 6f 75 |.....:..|... .mou|
|000011c0| 73 65 0d 07 b2 3b e7 20 | 62 6c 6f 63 6b 25 21 38 |se...;. |block%!8|
|000011d0| 3d 32 20 8c 20 f2 63 72 | 65 61 74 65 5f 6d 65 6e |=2 . .cr|eate_men|
|000011e0| 75 28 22 41 7a 75 6d 69 | 74 68 22 2c 21 62 6c 6f |u("Azumi|th",!blo|
|000011f0| 63 6b 25 2c 62 6c 6f 63 | 6b 25 21 34 29 0d 07 bc |ck%,bloc|k%!4)...|
|00001200| 05 e1 0d 07 c6 05 3a 0d | 07 d0 20 dd 20 a4 67 65 |......:.|.. . .ge|
|00001210| 74 5f 6d 65 6e 75 5f 69 | 74 65 6d 28 64 62 25 2c |t_menu_i|tem(db%,|
|00001220| f8 20 6f 66 66 25 29 0d | 07 da 09 ea 20 73 74 24 |. off%).|.... st$|
|00001230| 0d 07 e4 24 c8 95 20 64 | 62 25 3f 6f 66 66 25 3c |...$.. d|b%?off%<|
|00001240| 3e 26 30 41 20 80 20 64 | 62 25 3f 6f 66 66 25 3c |>&0A . d|b%?off%<|
|00001250| 3e 26 30 44 0d 07 ee 14 | 73 74 24 2b 3d bd 28 64 |>&0D....|st$+=.(d|
|00001260| 62 25 3f 6f 66 66 25 29 | 0d 07 f8 0b 6f 66 66 25 |b%?off%)|....off%|
|00001270| 2b 3d 31 0d 08 02 05 ce | 0d 08 0c 0b 6f 66 66 25 |+=1.....|....off%|
|00001280| 2b 3d 31 0d 08 16 08 3d | 73 74 24 0d 08 20 05 3a |+=1....=|st$.. .:|
|00001290| 0d 08 2a 1c dd 20 a4 66 | 69 6e 64 5f 6d 65 6e 75 |..*.. .f|ind_menu|
|000012a0| 28 6e 61 6d 65 24 2c 64 | 61 74 61 29 0d 08 34 09 |(name$,d|ata)..4.|
|000012b0| ea 20 66 69 24 0d 08 3e | 13 6e 61 6d 65 24 3d 22 |. fi$..>|.name$="|
|000012c0| 5e 22 2b 6e 61 6d 65 24 | 0d 08 48 09 6f 66 73 3d |^"+name$|..H.ofs=|
|000012d0| 30 0d 08 52 05 f5 0d 08 | 5c 20 66 69 24 3d a4 67 |0..R....|\ fi$=.g|
|000012e0| 65 74 5f 6d 65 6e 75 5f | 69 74 65 6d 28 64 61 74 |et_menu_|item(dat|
|000012f0| 61 2c 6f 66 73 29 0d 08 | 66 19 fd 20 66 69 24 3d |a,ofs)..|f.. fi$=|
|00001300| 6e 61 6d 65 24 20 84 20 | 66 69 24 3d 22 7e 22 0d |name$ . |fi$="~".|
|00001310| 08 70 13 e7 20 66 69 24 | 3d 22 7e 22 20 8c 20 3d |.p.. fi$|="~" . =|
|00001320| 2d 31 0d 08 7a 08 3d 6f | 66 73 0d 08 84 05 3a 0d |-1..z.=o|fs....:.|
|00001330| 08 8e 0b dd 20 a4 71 75 | 69 74 0d 08 98 0a e5 20 |.... .qu|it..... |
|00001340| 8d 44 4a 41 0d 08 a2 05 | e0 0d 08 ac 05 3a 0d 08 |.DJA....|.....:..|
|00001350| b6 04 0d 08 c0 1b dc 20 | 22 79 6f 75 6e 67 20 6d |....... |"young m|
|00001360| 61 6e 22 2c 22 6f 6c 64 | 20 6d 61 6e 22 0d 08 ca |an","old| man"...|
|00001370| 25 dc 20 22 66 72 6f 6d | 20 47 77 65 6e 74 20 20 |%. "from| Gwent  |
|00001380| 20 22 2c 22 66 72 6f 6d | 20 4b 65 6e 74 20 20 20 | ","from| Kent   |
|00001390| 20 22 0d 08 d4 25 dc 20 | 22 66 72 6f 6d 20 54 61 | "...%. |"from Ta|
|000013a0| 73 68 6b 65 6e 74 22 2c | 22 66 72 6f 6d 20 42 72 |shkent",|"from Br|
|000013b0| 65 6e 74 20 20 20 22 0d | 08 de 31 dc 20 22 63 75 |ent   ".|..1. "cu|
|000013c0| 72 64 6c 65 64 22 2c 22 | 77 72 61 70 70 65 64 20 |rdled","|wrapped |
|000013d0| 75 70 22 2c 22 63 6f 76 | 65 72 65 64 22 2c 22 73 |up","cov|ered","s|
|000013e0| 70 75 6e 20 64 72 79 22 | 0d 08 e8 2d dc 20 22 68 |pun dry"|...-. "h|
|000013f0| 69 73 20 66 6f 6f 74 22 | 2c 22 61 20 64 6f 67 22 |is foot"|,"a dog"|
|00001400| 2c 22 74 68 65 20 63 61 | 74 22 2c 22 68 69 73 20 |,"the ca|t","his |
|00001410| 68 65 61 64 22 0d 08 f2 | 2f dc 20 22 77 69 74 68 |head"...|/. "with|
|00001420| 20 61 20 74 65 6e 74 22 | 2c 22 69 6e 20 63 65 6d | a tent"|,"in cem|
|00001430| 65 6e 74 20 20 22 2c 22 | 69 6e 20 61 20 76 65 6e |ent  ","|in a ven|
|00001440| 74 20 20 22 0d 08 fc 57 | dc 20 22 4f 6e 65 20 64 |t  "...W|. "One d|
|00001450| 61 79 20 69 6e 20 74 68 | 65 20 70 61 72 6b 20 20 |ay in th|e park  |
|00001460| 20 20 20 20 22 2c 22 4f | 6e 65 20 6e 69 67 68 74 |    ","O|ne night|
|00001470| 20 61 66 74 65 72 20 64 | 61 72 6b 20 20 20 22 2c | after d|ark   ",|
|00001480| 22 4c 61 73 74 20 77 65 | 65 6b 20 69 6e 20 74 68 |"Last we|ek in th|
|00001490| 65 20 70 61 72 6b 20 20 | 20 20 22 0d 09 06 29 dc |e park  |  "...).|
|000014a0| 20 22 72 61 6e 20 6f 66 | 66 22 2c 22 74 75 72 6e | "ran of|f","turn|
|000014b0| 65 64 20 62 6c 75 65 22 | 2c 22 77 65 6e 74 20 62 |ed blue"|,"went b|
|000014c0| 61 6e 67 22 0d 09 10 3b | dc 20 22 6c 69 6b 65 20 |ang"...;|. "like |
|000014d0| 61 20 71 75 61 72 6b 20 | 20 20 22 2c 22 77 69 74 |a quark |  ","wit|
|000014e0| 68 20 61 20 73 70 61 72 | 6b 20 20 20 22 2c 22 77 |h a spar|k   ","w|
|000014f0| 69 74 68 20 61 20 62 61 | 72 6b 20 20 20 20 22 0d |ith a ba|rk    ".|
|00001500| 09 1a 35 dc 20 22 77 68 | 65 72 65 20 69 74 20 77 |..5. "wh|ere it w|
|00001510| 65 6e 74 22 2c 22 69 74 | 73 20 69 6e 74 65 6e 74 |ent","it|s intent|
|00001520| 20 20 20 22 2c 22 77 68 | 79 20 69 74 20 77 65 6e |   ","wh|y it wen|
|00001530| 74 20 20 22 0d 09 24 05 | 3a 0d 09 2e 0e dd 20 f2 |t  "..$.|:..... .|
|00001540| 63 6f 6e 63 6f 63 74 0d | 09 38 0a f7 20 8d 64 40 |concoct.|.8.. .d@|
|00001550| 48 0d 09 42 17 e3 20 50 | 3d 31 20 b8 20 b3 28 32 |H..B.. P|=1 . .(2|
|00001560| 29 3a f3 20 4d 24 3a ed | 0d 09 4c 1e 6c 69 6e 65 |):. M$:.|..L.line|
|00001570| 24 28 31 29 3d 22 54 68 | 65 72 65 20 77 61 73 20 |$(1)="Th|ere was |
|00001580| 61 20 22 2b 4d 24 0d 09 | 56 0a f7 20 8d 64 4a 48 |a "+M$..|V.. .dJH|
|00001590| 0d 09 60 17 e3 20 50 3d | 31 20 b8 20 b3 28 34 29 |..`.. P=|1 . .(4)|
|000015a0| 3a f3 20 4d 24 3a ed 0d | 09 6a 1c 6c 69 6e 65 24 |:. M$:..|.j.line$|
|000015b0| 28 31 29 3d 6c 69 6e 65 | 24 28 31 29 2b 22 20 22 |(1)=line|$(1)+" "|
|000015c0| 2b 4d 24 0d 09 74 0a f7 | 20 8d 64 5e 48 0d 09 7e |+M$..t..| .d^H..~|
|000015d0| 17 e3 20 50 3d 31 20 b8 | 20 b3 28 34 29 3a f3 20 |.. P=1 .| .(4):. |
|000015e0| 4d 24 3a ed 0d 09 88 16 | 6c 69 6e 65 24 28 32 29 |M$:.....|line$(2)|
|000015f0| 3d 22 57 68 6f 20 22 2b | 4d 24 0d 09 92 0a f7 20 |="Who "+|M$..... |
|00001600| 8d 64 68 48 0d 09 9c 17 | e3 20 50 3d 31 20 b8 20 |.dhH....|. P=1 . |
|00001610| b3 28 34 29 3a f3 20 4d | 24 3a ed 0d 09 a6 1c 6c |.(4):. M|$:.....l|
|00001620| 69 6e 65 24 28 32 29 3d | 6c 69 6e 65 24 28 32 29 |ine$(2)=|line$(2)|
|00001630| 2b 22 20 22 2b 4d 24 0d | 09 b0 0a f7 20 8d 64 72 |+" "+M$.|.... .dr|
|00001640| 48 0d 09 ba 17 e3 20 50 | 3d 31 20 b8 20 b3 28 33 |H..... P|=1 . .(3|
|00001650| 29 3a f3 20 4d 24 3a ed | 0d 09 c4 1c 6c 69 6e 65 |):. M$:.|....line|
|00001660| 24 28 32 29 3d 6c 69 6e | 65 24 28 32 29 2b 22 20 |$(2)=lin|e$(2)+" |
|00001670| 22 2b 4d 24 0d 09 ce 0a | f7 20 8d 64 7c 48 0d 09 |"+M$....|. .d|H..|
|00001680| d8 17 e3 20 50 3d 31 20 | b8 20 b3 28 33 29 3a f3 |... P=1 |. .(3):.|
|00001690| 20 4d 24 3a ed 0d 09 e2 | 1d 6c 69 6e 65 24 28 33 | M$:....|.line$(3|
|000016a0| 29 3d 4d 24 3a 6c 69 6e | 65 24 28 34 29 3d 22 49 |)=M$:lin|e$(4)="I|
|000016b0| 74 22 0d 09 ec 0a f7 20 | 8d 54 46 49 0d 09 f6 17 |t"..... |.TFI....|
|000016c0| e3 20 50 3d 31 20 b8 20 | b3 28 33 29 3a f3 20 4d |. P=1 . |.(3):. M|
|000016d0| 24 3a ed 0d 0a 00 1c 6c | 69 6e 65 24 28 34 29 3d |$:.....l|ine$(4)=|
|000016e0| 6c 69 6e 65 24 28 34 29 | 2b 22 20 22 2b 4d 24 0d |line$(4)|+" "+M$.|
|000016f0| 0a 0a 0a f7 20 8d 54 50 | 49 0d 0a 14 17 e3 20 50 |.... .TP|I..... P|
|00001700| 3d 31 20 b8 20 b3 28 33 | 29 3a f3 20 4d 24 3a ed |=1 . .(3|):. M$:.|
|00001710| 0d 0a 1e 1c 6c 69 6e 65 | 24 28 34 29 3d 6c 69 6e |....line|$(4)=lin|
|00001720| 65 24 28 34 29 2b 22 20 | 22 2b 4d 24 0d 0a 28 0a |e$(4)+" |"+M$..(.|
|00001730| f7 20 8d 54 5a 49 0d 0a | 32 17 e3 20 50 3d 31 20 |. .TZI..|2.. P=1 |
|00001740| b8 20 b3 28 33 29 3a f3 | 20 4d 24 3a ed 0d 0a 3c |. .(3):.| M$:...<|
|00001750| 28 6c 69 6e 65 24 28 35 | 29 3d 22 41 6e 64 20 6e |(line$(5|)="And n|
|00001760| 6f 2d 6f 6e 65 20 77 6f | 72 6b 65 64 20 6f 75 74 |o-one wo|rked out|
|00001770| 20 22 2b 4d 24 0d 0a 46 | 05 3a 0d 0a 50 05 e1 0d | "+M$..F|.:..P...|
|00001780| ff                      |                         |.       |        |
+--------+-------------------------+-------------------------+--------+--------+